object Form19: TForm19 Left = 197 Top = 366 BorderStyle = bsDialog Caption = 'Demo 19' ClientHeight = 367 ClientWidth = 596 Font.Color = clBlack Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 120 Position = poScreenCenter TextHeight = 16 object Label1: TLabel Left = 11 Top = 12 Width = 175 Height = 18 Alignment = taCenter Caption = 'Panel 1with CheckBoxes' Color = clBtnFace Font.Color = clNavy Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label2: TLabel Left = 424 Top = 20 Width = 105 Height = 54 Caption = 'Panel 2 with a Radiogroup on Top' Color = clBtnFace Font.Color = clNavy Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False WordWrap = True end object Label3: TLabel Left = 216 Top = 20 Width = 127 Height = 54 Caption = 'Panel 3 with a DBRadiogroup on Top' Color = clBtnFace Font.Color = clNavy Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False WordWrap = True end object CancelBtn: TBitBtn Left = 486 Top = 330 Width = 95 Height = 33 TabOrder = 0 Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object Panel1: TPanel Left = 28 Top = 36 Width = 121 Height = 81 BorderStyle = bsSingle TabOrder = 1 object CheckBox1: TCheckBox Left = 12 Top = 8 Width = 97 Height = 17 Alignment = taLeftJustify Caption = 'CheckBox1' Font.Color = clFuchsia Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object CheckBox3: TCheckBox Left = 12 Top = 32 Width = 97 Height = 17 Alignment = taLeftJustify Caption = 'CheckBox3' Font.Color = clFuchsia Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object CheckBox4: TCheckBox Left = 12 Top = 56 Width = 97 Height = 17 Alignment = taLeftJustify Caption = 'CheckBox4' Font.Color = clFuchsia Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end object CheckBox2: TCheckBox Left = 212 Top = 200 Width = 97 Height = 17 Caption = 'CheckBox2' Font.Color = clBlack Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object RadioButton1: TRadioButton Left = 212 Top = 176 Width = 113 Height = 17 Caption = 'RadioButton1' Font.Color = clBlack Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 3 end object RadioGroup1: TRadioGroup Left = 16 Top = 248 Width = 153 Height = 89 Caption = 'RadioGroup1' Font.Color = clYellow Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 4 end object RadioButton2: TRadioButton Left = 28 Top = 268 Width = 113 Height = 17 Caption = 'RadioButton2' Font.Color = clYellow Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 5 end object RadioButton3: TRadioButton Left = 28 Top = 288 Width = 113 Height = 17 Caption = 'RadioButton3' Font.Color = clYellow Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 6 end object RadioButton4: TRadioButton Left = 28 Top = 308 Width = 113 Height = 17 Caption = 'RadioButton4' Font.Color = clYellow Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 7 end object Panel2: TPanel Left = 396 Top = 72 Width = 185 Height = 113 TabOrder = 8 object RadioGroup2: TRadioGroup Left = 8 Top = 8 Width = 169 Height = 97 Caption = 'RadioGroup2' Font.Color = clOlive Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object RadioButton5: TRadioButton Left = 32 Top = 32 Width = 113 Height = 17 Caption = 'RadioButton5' Font.Color = clOlive Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object RadioButton6: TRadioButton Left = 32 Top = 56 Width = 113 Height = 17 Caption = 'RadioButton6' Font.Color = clOlive Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object RadioButton7: TRadioButton Left = 32 Top = 80 Width = 113 Height = 17 Caption = 'RadioButton7' Font.Color = clOlive Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 3 end end object DBRadioGroup1: TDBRadioGroup Left = 12 Top = 144 Width = 169 Height = 73 Caption = 'DBRadioGroup1' Font.Color = clRed Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 9 end object DBCheckBox1: TDBCheckBox Left = 24 Top = 168 Width = 121 Height = 17 Alignment = taLeftJustify Caption = 'DBCheckBox1' Font.Color = clRed Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 10 ValueChecked = 'True' ValueUnchecked = 'False' end object DBCheckBox2: TDBCheckBox Left = 24 Top = 192 Width = 121 Height = 17 Alignment = taLeftJustify Caption = 'DBCheckBox2' Font.Color = clRed Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 11 ValueChecked = 'True' ValueUnchecked = 'False' end object Panel3: TPanel Left = 192 Top = 80 Width = 185 Height = 81 TabOrder = 12 object DBRadioGroup2: TDBRadioGroup Left = 8 Top = 8 Width = 165 Height = 65 Caption = 'DBRadioGroup2' Font.Color = clMaroon Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object DBCheckBox3: TDBCheckBox Left = 24 Top = 28 Width = 121 Height = 17 Caption = 'DBCheckBox3' Font.Color = clMaroon Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 ValueChecked = 'True' ValueUnchecked = 'False' end object DBCheckBox4: TDBCheckBox Left = 24 Top = 48 Width = 121 Height = 17 Caption = 'DBCheckBox4' Font.Color = clMaroon Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 2 ValueChecked = 'True' ValueUnchecked = 'False' end end object Button1: TButton Left = 204 Top = 256 Width = 117 Height = 33 Caption = 'View Panel 1' TabOrder = 13 OnClick = Button1Click end object Button2: TButton Left = 204 Top = 288 Width = 117 Height = 33 Caption = 'View Panel 2' TabOrder = 14 OnClick = Button2Click end object Button3: TButton Left = 204 Top = 320 Width = 117 Height = 33 Caption = 'View Panel 3' TabOrder = 15 OnClick = Button3Click end object Button4: TButton Left = 324 Top = 256 Width = 185 Height = 33 Caption = 'View DBRadioGroup 1' TabOrder = 16 OnClick = Button4Click end object Button5: TButton Left = 324 Top = 288 Width = 185 Height = 33 Caption = 'View RadioGroup 1' TabOrder = 17 OnClick = Button5Click end object Button6: TButton Left = 324 Top = 320 Width = 117 Height = 33 Caption = 'View All' TabOrder = 18 OnClick = Button6Click end object Memo1: TMemo Left = 20 Top = 376 Width = 561 Height = 141 Alignment = taCenter Lines.Strings = ( 'This command is trying to View DBRadioGroup1 but the result' 'is that only the the Frame is viewed. The reason for that is tha' + 't' 'the DBCheckBoxes displayed inside the DBRadioGroup are' 'not children of the DBRadioGroup. ' '' 'To get past this problem, rather use a TPanel with the ' 'DBRadioGroup on top and then use the Panel as the TWinControl' 'to print.') TabOrder = 19 Visible = False end object Memo2: TMemo Left = 16 Top = 380 Width = 561 Height = 141 Alignment = taCenter Lines.Strings = ( 'This command is trying to View RadioGroup1 but the result' 'is that only the the Frame is viewed. The reason for that is tha' + 't' 'the RadioButtons displayed inside the RadioGroup are' 'not children of the RadioGroup. ' '' 'To get past this problem, rather use a TPanel with the ' 'RadioGroup on top and then use the Panel as the TWinControl' 'to print like Panel2') TabOrder = 20 Visible = False end object DBPrintWin1: TDBPrintWin About = 'Version 5.32' AboutRegistered = 'TOM SNIDER' HeaderFont.Color = clWindowText HeaderFont.Height = 16 HeaderFont.Name = 'Arial' HeaderFont.Style = [] Font.Color = clWindowText Font.Height = 16 Font.Name = 'Arial' Font.Style = [] FooterFont.Color = clWindowText FooterFont.Height = 12 FooterFont.Name = 'Arial' FooterFont.Style = [] FrameObjects = True clBtnFaceAsWhite = True OutputTo = poViewer Orientation = Default Units = poInches ViewButtonVisible = False ShowCancelDialog = True LineWidth = 0 Copies = 1 GridBackDrop = False GridBackDropUnits = poInches ZoomPercentage = 25.000000000000000000 HeaderTop = 0.500000000000000000 HeaderLeft = 0.500000000000000000 HeaderStringLeft = ' ' HeaderStringCenter = ' ' HeaderStringRight = ' ' HeaderEnabled = True HeaderOutlined = False HeaderFilled = False TextColor = clBlack ViewBkColor = 11234567 ViewHeading = 'Printit Viewer' HeadingColor = clSilver FrameStyle = frThin FooterTop = 10.170000000000000000 FooterString = ' ' FooterEnabled = True FooterOutlined = False FooterFilled = False FixSansSerif = True FooterStringLeft = 'Printed on @Date at @Time' FooterStringRight = 'Page @Page' BorderLeft = 0.500000000000000000 BorderRight = 0.500000000000000000 LineSpacing = 2.800000000000000000 Left = 376 Top = 192 end end